eststo clear


if("`c(os)'"=="Windows"){
	local tableSaveDir = "ReviewResponseResults\"
	local plotSaveDir = "ReviewResponseResults\"
	local pythonSaveDir = "PythonScripts\"
}
else{
	local tableSaveDir = "ReviewResponseResults/"
	local plotSaveDir = "ReviewResponseResults/"
	local pythonSaveDir = "PythonScripts/"
}

//Establish Control Variable Sets
//Spec1 controls are the same for both registrations and VMT 
local spec1Controls = "c.normYear#i.stateGroup c.quadYear#i.stateGroup asinhMetroPop asinhNonMetroPop asinhMetroInc asinhNonMetroInc logrealmeangasprice logemployment loglicenseddrivers logrealstategdp logroadmileage"

//Other controls are not the same for both registrations and VMT 
//Registration Controls
local spec2RegControls = "`spec1Controls' i.transactionDataDummy"
local spec3RegControls = "`spec2RegControls' i.regDummyExtSpec3"
local spec4RegControls = "`spec2RegControls' i.regDummyExtSpec4"


di "`spec3RegControls'"

//VMT Controls
local spec2VMTControls = "`spec1Controls'"
local spec3VMTControls = "`spec2VMTControls' i.vmtDummyExtSpec3"
local spec4VMTControls = "`spec2VMTControls' i.vmtDummyExtSpec4"

//Absorb Vars are always time and state fixed effects
local absorbVars = "ib51.stateGroup ib1995.year"

//Establish Cluster Variable
local clusterVar = "stateGroup year"

//Establish primary null
local primaryNull = 1.6
local altNull = 1
local altNull2 = 0.3
local altNull3 = 0
local altNull4 = -2.5

frame create emissions
frame change emissions

if("`c(os)'"=="Windows"){
	local dataFile = "CleanedData\EmissionsProgramsV2.xlsx"
}
else{
	local dataFile = "CleanedData/EmissionsProgramsV2.xlsx"
}

import excel using "`dataFile'", first sheet("Clean") case(l)

frame change default
frlink m:1 state, frame(emissions)
frget stateemissionsprogram startemission endemission, from(emissions)

gen emissionind = 0
replace emissionind = 1 if year>=startemission & year<=endemission & stateemissionsprogram==1

frame drop emissions

//non-normalized models
local treatmentVar = "1.nosafetyind"


local fsVarsSpec2 = "logregistrations i.nosafetyind `spec2RegControls' i.emissionind"
local rfVarsSpec2 = "logvmt i.nosafetyind `spec2VMTControls' i.emissionind"

local fsOut = "logregistrations"
local rfOut = "logvmt"

local treatControl = "nosafetyind"

local fsControlsSpec1 = "`spec1Controls' i.emissionind"
local rfControlsSpec1 = "`spec1Controls' i.emissionind"


local modelTitleSpec1 = "Spec1Emissions"
local nullLowSpec1 = -4
local nullDeltaSpec1 = 0.001
local nullHighSpec1 = 1

runModelFWL `fsOut', `rfOut', `fsControlsSpec1', `rfControlsSpec1', `treatControl', `absorbVars', `clusterVar', `treatmentVar', `modelTitleSpec1', `nullLowSpec1', `nullDeltaSpec1', `nullHighSpec1', `primaryNull', `altNull', `altNull2', `altNull3', `altNull4'

local fsControlsSpec2 = "`spec2RegControls' i.emissionind"
local rfControlsSpec2 = "`spec2VMTControls' i.emissionind"


local modelTitleSpec2 = "Spec2Emissions"
local nullLowSpec2 = -4
local nullDeltaSpec2 = 0.001
local nullHighSpec2 = 1

runModelFWL `fsOut', `rfOut', `fsControlsSpec2', `rfControlsSpec2', `treatControl', `absorbVars', `clusterVar', `treatmentVar', `modelTitleSpec2', `nullLowSpec2', `nullDeltaSpec2', `nullHighSpec2', `primaryNull', `altNull', `altNull2', `altNull3', `altNull4'
// runModel `fsVarsSpec2', `rfVarsSpec2', `clusterVar', `treatmentVar', `modelTitleSpec2', `nullLowSpec2', `nullDeltaSpec2', `nullHighSpec2', `primaryNull', `altNull', `altNull2', `altNull3', `altNull4'
//
// python script "`pythonSaveDir'combineIV.py" 
//
//
// constructTable VMTPerCapitaiv; Fleet Travel Distance Per Capita; Spec1PerCapita Spec2PerCapita Spec3PerCapita Spec4PerCapita; `primaryNull'; `altNull'; `altNull2'; `altNull3'; `altNull4'
// constructTable VMTiv; Fleet Travel Distance ; Spec1 Spec2 Spec3 Spec4; `primaryNull'; `altNull'; `altNull2'; `altNull3'; `altNull4'
